CAAIlluminatedFraction_MarsMagnitudeMuller <-
function(r, Delta, i){
.Call("CAAIlluminatedFraction_MarsMagnitudeMuller", r, Delta, i)
}
